* lisp/gnus/message.el (message-mode): Use message-mode-abbrev-table,

with text-mode-abbrev-table as parent.  (Bug#14413)

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index a7789263adfd4289b81ae48be8be59b7419064ff..8913215c609d05319b8633458fbf8321da021bac 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,8 @@
+2013-05-18  Glenn Morris  <rgm@gnu.org>
+
+       * message.el (message-mode): Use message-mode-abbrev-table,
+       with text-mode-abbrev-table as parent.  (Bug#14413)
+
 2013-05-16  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * message.el (message-expand-group): Decode group names.

diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index 2a1ad892c2e9dc34b120e5d16239e9cdb7a63a27..a14f257aaf35b8c769036836ab0eea3e920f09ea 100644 (file)
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -2939,7 +2939,6 @@ C-c M-n  `message-insert-disposition-notification-to'  (request receipt).
 C-c M-m  `message-mark-inserted-region' (mark region with enclosing tags).
 C-c M-f  `message-mark-insert-file' (insert file marked with enclosing tags).
 M-RET    `message-newline-and-reformat' (break the line and reformat)."
-  (setq local-abbrev-table text-mode-abbrev-table)
   (set (make-local-variable 'message-reply-buffer) nil)
   (set (make-local-variable 'message-inserted-headers) nil)
   (set (make-local-variable 'message-send-actions) nil)